object FConfiguracoes: TFConfiguracoes
  Left = 0
  Top = 0
  BorderIcons = [biSystemMenu]
  Caption = 'Configura'#231#245'es'
  ClientHeight = 207
  ClientWidth = 521
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 521
    Height = 170
    Align = alClient
    BevelInner = bvSpace
    TabOrder = 0
    object Label1: TLabel
      Left = 5
      Top = 8
      Width = 81
      Height = 13
      Caption = 'Empresa/Usu'#225'rio'
      FocusControl = DBEdit1
    end
    object Label2: TLabel
      Left = 5
      Top = 49
      Width = 45
      Height = 13
      Caption = 'Endere'#231'o'
      FocusControl = DBEdit2
    end
    object Label3: TLabel
      Left = 419
      Top = 88
      Width = 42
      Height = 13
      Caption = 'Telefone'
      FocusControl = DBEdit3
    end
    object Label4: TLabel
      Left = 229
      Top = 88
      Width = 33
      Height = 13
      Caption = 'Cidade'
      FocusControl = DBEdit4
    end
    object Label5: TLabel
      Left = 5
      Top = 88
      Width = 28
      Height = 13
      Caption = 'Bairro'
      FocusControl = DBEdit5
    end
    object Label6: TLabel
      Left = 132
      Top = 128
      Width = 58
      Height = 13
      Caption = 'Nova Senha'
    end
    object DBEdit1: TDBEdit
      Left = 5
      Top = 24
      Width = 507
      Height = 21
      CharCase = ecUpperCase
      DataField = 'Empresa'
      DataSource = dsConfig
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 5
      Top = 63
      Width = 507
      Height = 21
      CharCase = ecUpperCase
      DataField = 'Endereco'
      DataSource = dsConfig
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 419
      Top = 102
      Width = 93
      Height = 21
      DataField = 'Telefone'
      DataSource = dsConfig
      TabOrder = 4
    end
    object DBEdit4: TDBEdit
      Left = 229
      Top = 102
      Width = 185
      Height = 21
      CharCase = ecUpperCase
      DataField = 'Cidade'
      DataSource = dsConfig
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 5
      Top = 102
      Width = 218
      Height = 21
      CharCase = ecUpperCase
      DataField = 'Bairro'
      DataSource = dsConfig
      TabOrder = 2
    end
    object BitBtn1: TBitBtn
      Left = 5
      Top = 136
      Width = 121
      Height = 26
      Caption = 'Alterar Senha'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 5
      OnClick = BitBtn1Click
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        18000000000000030000120B0000120B00000000000000000000FF00FF0E80AA
        0E80AA0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FF0F82ABA2D2E2D7FFFF93E4F51887AFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E80AA5DBFDB
        A0CEDFB2FBFF6DD4ED0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FF0E80AA4EBEDC9ECDDD98F7FF2FA7CCFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        0E80AA3FBDDEA1D2E20E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E80AA2EBADE9CCDDE0E80AA09
        8CB80E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        FF00FFFF00FF0E80AA1DB9E09CD0E14CE5FF17DAFF0E80AA0E80AA0E80AA0E80
        AA0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E80AA1DB8DE2C
        C1E71BD5FF27DAFF31DEFF3BE0FF44E1FF51E8FF0E80AAFF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FF0E80AA3EE0FF49DCFE52DDFE5BDFFE64E2FF6CE3
        FE7AE8FF88F0FF0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E80AA6C
        EAFF6FE3FF77E5FF82E7FF88E8FFA2F1FF98E4F7AEF5FF0E80AAFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FF0E80AA94F0FF98ECFFA1EEFFAAEFFFC0F9FFD6F1
        F52E8EB2D4FAFE0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E80AABB
        F3FFBDF3FFC3F3FFD9FDFFDFF5F7248AB00E80AADFFFFF0E80AAFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FF0E80AAEEFDFFCDF7FFCEF8FFAEDBE72086AD0E80
        AA077CA7D6FEFF0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E
        80AAF1FFFFDEFFFFA3DEEFA0DDEDB6EAF7C8F3F9D4FCFF0E80AAFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0E80AA0E80AA0E80AA0E80AA0E80
        AA0E80AA0E80AAFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
    end
    object EdNovaSenha: TEdit
      Left = 132
      Top = 141
      Width = 116
      Height = 21
      CharCase = ecUpperCase
      Enabled = False
      MaxLength = 8
      PasswordChar = '#'
      TabOrder = 6
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 170
    Width = 521
    Height = 37
    Align = alBottom
    BevelInner = bvSpace
    TabOrder = 1
    object BitBtn2: TBitBtn
      Left = 147
      Top = 5
      Width = 101
      Height = 26
      Caption = 'Gravar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn2Click
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FF006600006600B59A9BB59A9BB59A9BB5
        9A9BB59A9BB59A9BB59A9B006600006600FF00FFFF00FFFF00FFFF00FF006600
        009900009900E5DEDF006600006600E4E7E7E0E3E6D9DFE0CCC9CC006600037D
        03006600FF00FFFF00FFFF00FF006600009900009900E9E2E2006600006600E2
        E1E3E2E6E8DDE2E4CFCCCF006600037D03006600FF00FFFF00FFFF00FF006600
        009900009900ECE4E4006600006600DFDDDFE1E6E8E0E5E7D3D0D2006600037D
        03006600FF00FFFF00FFFF00FF006600009900009900EFE6E6EDE5E5E5DEDFE0
        DDDFDFE0E2E0E1E3D6D0D2006600037D03006600FF00FFFF00FFFF00FF006600
        0099000099000099000099000099000099000099000099000099000099000099
        00006600FF00FFFF00FFFF00FF006600009900B1D0B1B1D0B1B1D0B1B1D0B1B1
        D0B1B1D0B1B1D0B1B1D0B1B1D0B1009900006600FF00FFFF00FFFF00FF006600
        009900F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F90099
        00006600FF00FFFF00FFFF00FF006600009900F9F9F9F9F9F9F9F9F9F9F9F9F9
        F9F9F9F9F9F9F9F9F9F9F9F9F9F9009900006600FF00FFFF00FFFF00FF006600
        009900F9F9F9CDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDF9F9F90099
        00006600FF00FFFF00FFFF00FF006600009900F9F9F9F9F9F9F9F9F9F9F9F9F9
        F9F9F9F9F9F9F9F9F9F9F9F9F9F9009900006600FF00FFFF00FFFF00FF006600
        009900F9F9F9CDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDF9F9F90099
        00006600FF00FFFF00FFFF00FF006600009900F9F9F9F9F9F9F9F9F9F9F9F9F9
        F9F9F9F9F9F9F9F9F9F9F9F9F9F9009900006600FF00FFFF00FFFF00FFFF00FF
        006600F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F9F90066
        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
    end
    object BitBtn3: TBitBtn
      Left = 274
      Top = 5
      Width = 101
      Height = 26
      Caption = 'Sair'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn3Click
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FF9A6666693334FF00FFFF00FFFF00FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF9A66669A6666B96666BB
        6868693334FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
        9A66669A6666C66A6BD06A6BD26869C368696933349A66669A66669A66669A66
        669A66669A6666FF00FFFF00FFFF00FF9A6666DE7374D77071D56F70D56D6EC7
        6A6D693334FEA2A3FCAFB0FABCBDF9C5C6F9C5C69A6666FF00FFFF00FFFF00FF
        9A6666E07778DB7576DA7475DA7273CC6E7169333439C56525CF6329CC6319CB
        5BF9C5C69A6666FF00FFFF00FFFF00FF9A6666E57D7EE07A7BDF797ADF7778D0
        727569333442C46830CD6733CB6724CB60F9C5C69A6666FF00FFFF00FFFF00FF
        9A6666EA8283E57F80E37D7EE68081D374766933343DC26429CB632FCA6420CA
        5EF9C5C69A6666FF00FFFF00FFFF00FF9A6666F08788E98182EC9697FBDDDED8
        888A693334B8E1AC6BDC895DD58046D473F9C5C69A6666FF00FFFF00FFFF00FF
        9A6666F58C8DEE8687F0999AFDDCDDDA888A693334FFF5D8FFFFE0FFFFDEECFD
        D4F9C5C69A6666FF00FFFF00FFFF00FF9A6666FA9192F48E8FF28B8CF48C8DDC
        7F80693334FDF3D4FFFFDFFFFFDDFFFFE0F9C5C69A6666FF00FFFF00FFFF00FF
        9A6666FE9798F99394F89293F99092E08585693334FDF3D4FFFFDFFFFFDDFFFF
        DFF9C5C69A6666FF00FFFF00FFFF00FF9A6666FF9B9CFD9798FC9697FE9798E3
        8889693334FDF3D4FFFFDFFFFFDDFFFFDFF9C5C69A6666FF00FFFF00FFFF00FF
        9A6666FF9FA0FF9A9BFF999AFF9A9BE78C8D693334FDF3D4FFFFDFFFFFDDFFFF
        DFF9C5C69A6666FF00FFFF00FFFF00FF9A66669A6666E98E8FFE999AFF9D9EEB
        8F90693334FBF0D2FDFCDCFDFCDAFDFCDCF9C5C69A6666FF00FFFF00FFFF00FF
        FF00FFFF00FF9A6666B07172D78687DA88886933349A66669A66669A66669A66
        669A66669A6666FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF9A66669A
        6666693334FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
    end
  end
  object dsConfig: TDataSource
    DataSet = tbConfig
    Left = 424
    Top = 136
  end
  object tbConfig: TIBDataSet
    Database = FPrincipal.DBAgecfi
    Transaction = TrConfiguracoes
    DeleteSQL.Strings = (
      'delete from Configuracoes'
      'where'
      '  EMPRESA = :OLD_EMPRESA')
    InsertSQL.Strings = (
      'insert into Configuracoes'
      '  (BAIRRO, CIDADE, EMPRESA, ENDERECO, SENHA, TELEFONE)'
      'values'
      '  (:BAIRRO, :CIDADE, :EMPRESA, :ENDERECO, :SENHA, :TELEFONE)')
    RefreshSQL.Strings = (
      'Select '
      '  EMPRESA,'
      '  ENDERECO,'
      '  BAIRRO,'
      '  CIDADE,'
      '  TELEFONE,'
      '  SENHA'
      'from Configuracoes '
      'where'
      '  EMPRESA = :EMPRESA')
    SelectSQL.Strings = (
      'select * from'
      'Configuracoes')
    ModifySQL.Strings = (
      'update Configuracoes'
      'set'
      '  BAIRRO = :BAIRRO,'
      '  CIDADE = :CIDADE,'
      '  EMPRESA = :EMPRESA,'
      '  ENDERECO = :ENDERECO,'
      '  SENHA = :SENHA,'
      '  TELEFONE = :TELEFONE'
      'where'
      '  EMPRESA = :OLD_EMPRESA')
    Left = 392
    Top = 136
    object tbConfigEMPRESA: TIBStringField
      FieldName = 'EMPRESA'
      Origin = 'CONFIGURACOES.EMPRESA'
      Size = 50
    end
    object tbConfigENDERECO: TIBStringField
      FieldName = 'ENDERECO'
      Origin = 'CONFIGURACOES.ENDERECO'
      Size = 50
    end
    object tbConfigBAIRRO: TIBStringField
      FieldName = 'BAIRRO'
      Origin = 'CONFIGURACOES.BAIRRO'
      Size = 50
    end
    object tbConfigCIDADE: TIBStringField
      FieldName = 'CIDADE'
      Origin = 'CONFIGURACOES.CIDADE'
      Size = 50
    end
    object tbConfigTELEFONE: TIBStringField
      FieldName = 'TELEFONE'
      Origin = 'CONFIGURACOES.TELEFONE'
      Size = 13
    end
    object tbConfigSENHA: TIBStringField
      FieldName = 'SENHA'
      Origin = 'CONFIGURACOES.SENHA'
      Size = 8
    end
  end
  object TrConfiguracoes: TIBTransaction
    DefaultDatabase = FPrincipal.DBAgecfi
    Params.Strings = (
      'read_committed'
      'rec_version'
      'nowait')
    Left = 458
    Top = 136
  end
end
